Program Autopots;//Made By Burninghate, Tips By FrostFyr
Var x, y, HpColor, Square:Integer;

Begin
Findwindowtitlepart('endless online', false)
Activateclient;
wait(700)

//Colors
Square:=32896
HPColor:=16235924
//Colors

Repeat
If (Findcolorspiral(x, y, HPColor,122, 29, 166, 35))Then
Begin//This Is Made For Big Pots
Clickmouse(78, 363,true)
Wait(100)

If (findcolorspiral(x, y, Square,112, 360, 478, 466))Then
Begin
Clickmouse(x,y, True)
Wait(50)
Clickmouse(x,y, True)
Wait(500)
End;
End;
Wait(50)
Until(False)
End.